Voorbeeld van de functie DateSerial

Dit voorbeeld maakt gebruik van de functie DateSerial om de datum te geven voor een opgegeven jaar, maand en dag.

Dim MyDate
' MyDate bevat de datum 12 februari 1969.
MyDate = DateSerial(1969, 2, 12)    ' Datum als resultaat.